home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwchg.dir / 00055_Script_55 < prev    next >
Text File  |  1994-11-15  |  5KB  |  175 lines
  1. on startMovie
  2.   cursor 4
  3.   global nowFrame, currMM
  4.   global horNess, dialogOn 
  5.   set dialogOn = FALSE
  6.   set currMM = "FLWWW"
  7.   puppetSprite 22, TRUE
  8.   puppetSprite 23, TRUE
  9.   puppetSprite 21, TRUE
  10.   puppetSprite 14, TRUE
  11.   puppetSprite 8, TRUE
  12.   set the immediate of sprite 23 to TRUE
  13.   set the stretch of sprite 23 to FALSE
  14.   cursor -1
  15. end startMovie
  16.  
  17. on stepMovie
  18.   global nowFrame,currFrame
  19.   if nowFrame <> currFrame then
  20.     seeAlsoList
  21.     set currFrame = nowFrame
  22.   end if
  23. end stepMovie
  24.  
  25. on stopMovie
  26.   set the castNum of sprite 21 to 1050
  27.   puppetSprite 21, FALSE
  28.   put " " into field "SeeAlsoText"
  29.   updateStage
  30. end stopMovie
  31.  
  32. on saveLocals
  33.   global lastFrame, nowFrame, lastMovie
  34.   set lastMovie = "FLWCHG"
  35.   set lastFrame = nowFrame
  36. end saveLocals
  37.  
  38. on buttonState
  39.   global bflag, FrankNav, dialogOn
  40.   
  41.   
  42.   if dialogOn = FALSE then
  43.     if rollover(15) then
  44.       periodRoll
  45.     else 
  46.       set the locV of sprite 14 to 490
  47.     end if
  48.     
  49.     -- don't check global buttons unless mouse is down at bottom
  50.     if (the mouseV > 200) or (bFlag = TRUE) then
  51.       set bFlag = FALSE
  52.       doState
  53.     end if
  54.   else if dialogOn = TRUE then
  55.     if the mouseDown then 
  56.       if the mouseCast <> the number of cast "glossDialog" then
  57.         beep
  58.       end if
  59.     end if
  60.   end if
  61. end buttonState
  62.  
  63. on chBackStep
  64.   global nowFrame
  65.   unLoadCast 9, 52
  66.   puppetSprite 8, FALSE
  67.   if nowFrame = "ch000bld061°°°" then
  68.     puppetTransition 1, 0, 8
  69.     go to frame "ch000bld060°°°" of movie "FLWCHF"
  70.   else
  71.     puppetTransition 1, 0, 8
  72.     go marker (-1)
  73.   end if
  74.   puppetSprite 8, TRUE
  75.   updateStage
  76. end chBackStep
  77.  
  78. on chForStep
  79.   global nowFrame
  80.   unLoadCast 9, 52
  81.   puppetSprite 8, FALSE
  82.   if nowFrame = "ch000bld082°°°" then
  83.     puppetTransition 2, 0, 8
  84.     go to frame "ch000bld083°°°" of movie "FLWCHJ"
  85.   else
  86.     puppetTransition 2, 0, 8
  87.     go marker (+1)
  88.   end if
  89.   puppetSprite 8, TRUE
  90.   updateStage
  91. end chForStep
  92.  
  93. on textRoll txHt
  94.   global topHat, horNess, dialogOn, seeAlsoBox
  95.   
  96.   if dialogOn = FALSE and seeAlsoBox = FALSE then
  97.     
  98.     set topHat = txHt
  99.     
  100.     if horNess = "ver" then
  101.       if the mouseH < 230 and the mouseV > 366 and the mouseV < 429 then
  102.         set the locV of sprite 8 to txHt
  103.         set the ink of sprite 16 to 8
  104.         set the foreColor of sprite 16 to 215
  105.         set rolledAlready = TRUE
  106.       else if the mouseH > 230 or the mouseV > 429 or the mouseV < topHat then
  107.         set the locV of sprite 8 to 364
  108.         set the ink of sprite 16 to 36
  109.         set the forecolor of sprite 16 to 0
  110.       end if
  111.       set horNess = "h"
  112.     else
  113.       if the mouseH < 414 and the mouseV > 366 and the mouseV < 429 then
  114.         set the locV of sprite 8 to txHt
  115.         set the ink of sprite 16 to 8
  116.         set the foreColor of sprite 16 to 215
  117.         set rolledAlready = TRUE
  118.       else if the mouseH > 414 or the mouseV > 429 or the mouseV < topHat then
  119.         set the locV of sprite 8 to 364
  120.         set the ink of sprite 16 to 36
  121.         set the forecolor of sprite 16 to 0
  122.       end if
  123.     end if
  124.     --updateStage
  125.   end if
  126. end textRoll
  127.  
  128. on periodRoll
  129.   global perV
  130.   put the mouseV - 206 into perV
  131.   put perV / 24 into perV
  132.   if perV = 0 then
  133.     set the locV of sprite 14 to 206
  134.   else if perV = 1 then
  135.     set the locV of sprite 14 to 230
  136.   else if perV = 2 then
  137.     set the locV of sprite 14 to 254
  138.   else if perV = 3 then
  139.     set the locV of sprite 14 to 278
  140.   else if perV = 4 then
  141.     set the locV of sprite 14 to 302
  142.   else if perV = 5 then
  143.     set the locV of sprite 14 to 326
  144.   else if perV = 6 then
  145.     set the locV of sprite 14 to 350
  146.   else if perV = 7 then
  147.     set the locV of sprite 14 to 374
  148.   end if
  149.   updateStage
  150. end periodRoll
  151.  
  152. on goPeriod
  153.   global perV
  154.   puppetSprite 8, FALSE
  155.   if perV = 0 then
  156.     go to frame "ch000bld001°°°" of movie "FLWCHE"
  157.   else if perV = 1 then
  158.     go to frame "ch000bld003°°°" of movie "FLWCHE"
  159.   else if perV = 2 then
  160.     go to frame "ch000bld019°°°" of movie "FLWCHF"
  161.   else if perV = 3 then
  162.     go to frame "ch000bld061°°°"
  163.     puppetSprite 8, TRUE
  164.   else if perV = 4 then
  165.     go to frame "ch000bld074°°°"
  166.     puppetSprite 8, TRUE
  167.   else if perV = 5 then
  168.     go to frame "ch000bld083°°°" of movie "FLWCHJ"
  169.   else if perV = 6 then
  170.     go to frame "ch000bld100°°°" of movie "FLWCHK"
  171.   else if perV = 7 then
  172.     go to frame "ch000bld118°°°" of movie "FLWCHL"
  173.   end if
  174.   updateStage
  175. end goPeriod